home *** CD-ROM | disk | FTP | other *** search
/ Workbench Add-On / Workbench Add-On - Volume 1.iso / Text / Edit / XDme / install < prev    next >
Encoding:
Text File  |  1995-11-24  |  1.7 KB  |  72 lines
  1. (if (= @language    "deutsch")
  2.     (
  3.         (SET Intro  "Wilkommen zum INstaller-Script für XDME")
  4.         (SET Where  "Wohin soll XDME hinkopiert werdem ? Es wird ein Verzeichnis namens XDME angelegt")
  5.         (SET Addit  "Nun werden einige Zeilen in s:user-startup angefügt")
  6.     )
  7. )
  8.  
  9. (if (= @language    "english")
  10.     (
  11.         (SET Intro  "Welcome to the installer-script for XDME")
  12.         (SET Where  "Where do you want to place XDME ? A drawer called XDME will be created")
  13.         (SET Addit  "Now some lines will be added to s:user-startup")
  14.     )
  15. )
  16.  
  17. (MESSAGE Intro)
  18.  
  19. (SET Wuck
  20.     (ASKDIR
  21.         (PROMPT Where)
  22.         (HELP   "")
  23.         (DEFAULT   "sys:")
  24.     )
  25. )
  26.  
  27. (SET DestDir (TACKON Wuck "XDME"))
  28.  
  29. (RUN (CAT "makedir \""DestDir"\""))
  30.  
  31. (COPYFILES
  32.     (SOURCE ":Text/Edit/XDme/")
  33.     (DEST   DestDir)
  34.     (ALL)
  35.     (INFOS)
  36. )
  37. (if (NOT (EXISTS "s:.edrc"))
  38.   (
  39.     (if (= @language "deutsch")
  40.         (COPYFILES
  41.             (SOURCE ":Text/Edit/XDme/S/deutsch.edrc")
  42.             (DEST   "s:")
  43.             (NEWNAME ".edrc")
  44.         )
  45.     )
  46.     (if (= @language "english")
  47.         (COPYFILES
  48.             (SOURCE ":Text/Edit/XDme/S/english.edrc")
  49.             (DEST   "s:")
  50.             (NEWNAME ".edrc")
  51.         )
  52.     )
  53.   )
  54. )
  55.  
  56.  
  57. (STARTUP @app-name
  58.     (PROMPT Addit)
  59.     (HELP   "")
  60.     (COMMAND
  61.         (CAT "assign c: \""DestDir"\" add\n"
  62.              "assign c: \""(TACKON DestDir "util/BinUtils")"\" add\n"
  63.              "assign c: \""(TACKON DestDir "util/CNVConfig")"\" add\n"
  64.         )
  65.     )
  66. )
  67.  
  68. (RUN (CAT "assign c: \""DestDir"\" add \n"
  69.           "assign c: \""(TACKON DestDir "util/BinUtils")"\" add\n"
  70.           "assign c: \""(TACKON DestDir "util/CNVConfig")"\" add\n"
  71.      ))
  72.